This forum is closed to new posts and
responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:
~Bella Asaboosimaroopsi 12.May.03 04:36 PM a Web browser General6.0.1iSeries
This web app was created on local, when placed on the server it crashes. On crashing, TCP/IP re-starts and consistency checking is performed.
Here are snippets of the code:
Options
Uselsx "*LSXODBC"
*******
Declarations
Dim conAS400 As ODBCConnection
Dim dbNotes As NotesDatabase
Dim sesNotes As NotesSession
******
Initialize
Set sesNotes = New NotesSession
Set dbNotes = sesNotes.CurrentDatabase
If Not fcnLogon Then
Exit Sub
End If
RetrieveInfo (parm1), (parm2), (parm3)
conAS400.Disconnect
*******
fcnLogon()
Set conAS400 = New ODBCConnection
REM* Connect to as400.
If Not conAS400.ConnectTo(strDataSource, strUserName$, strPassWord$) Then
Exit Function
End If
******
Sub RetrieveInfo()
Dim resOverview As New ODBCResultSet
Set resOverview = New ODBCResultSet
Set resOverview.Connection = conAS400
Call resOverview.ExecProcedure("XXXX","XXXX ", strPassData)
It seems to crash on the "Set resOverview.Connection = conAS400" statement.
Prior to getting to this part of the code, it does two sql's to retrieve some other data. Then it does several call to stored procedures, this one is the first stored procedure.
This worked fine on local.... I'm stumped. I sure hope someone can help me.
Return to top
as400 db2 connection problem, need ... (~Bella Asaboosi... 12.May.03)
. . 
Print this page
